// ----------------------------------
// RSDK Project: Sonic 2
// Script Description: CNZ Setup Object
// Script Author: Christian Whitehead/Simon Thomley
// Unpacked by Rubberduckycooly's script unpacker
// ----------------------------------

// ========================
// Aliases
// ========================

private alias object.value1 : object.paletteTimer
private alias object.value2 : object.paletteIndex1
private alias object.value3 : object.paletteIndex2
private alias object.value4 : object.paletteIndex3
private alias object.value5 : object.deformTimer
private alias object.value6 : object.sonicPlateFrameID
private alias object.value7 : object.tailsPlateFrameID

// Player Aliases
private alias object.state : player.state
private alias object.gravity : player.gravity
private alias object.direction : player.direction
private alias object.left : player.left
private alias object.right : player.right
private alias object.speed : player.speed
private alias object.angle : player.angle
private alias object.animation : player.animation
private alias object.animationSpeed : player.animationSpeed

private alias object.value1  : player.timer
private alias object.value5  : player.rollAnimationSpeed
private alias object.value14 : player.skidding
private alias object.value29 : player.rollingFriction
private alias object.value31 : player.rollingDeceleration

// Tracks
private alias 0 : TRACK_STAGE
private alias 1 : TRACK_ACTFINISH
private alias 2 : TRACK_INVINCIBLE
private alias 3 : TRACK_CONTINUE
private alias 4 : TRACK_BOSS
private alias 5 : TRACK_GAMEOVER
private alias 6 : TRACK_DROWNING
private alias 7 : TRACK_SUPER

// Reserved object slots
private alias 10 : SLOT_ZONESETUP
private alias 25 : SLOT_MUSICEVENT_CHANGE
private alias 26 : SLOT_MUSICEVENT_BOSS

// Music Events
private alias 2 : MUSICEVENT_TRANSITION

private alias 0 : MUSICEVENT_FLAG_NOCHANGE
private alias 1 : MUSICEVENT_FLAG_SPEEDUP
private alias 2 : MUSICEVENT_FLAG_SLOWDOWN

// Music Loops
private alias 62820  : MUSIC_LOOP_CNZ_1P
private alias 50312  : MUSIC_LOOP_CNZ_1P_F

private alias 95868  : MUSIC_LOOP_CNZ_2P
private alias 76718  : MUSIC_LOOP_CNZ_2P_F

private alias 38679  : MUSIC_LOOP_INV
private alias 30897  : MUSIC_LOOP_INV_F


// ========================
// Function Declarations
// ========================

// These first two functions are Player states, used by the D Plunger, Spinner H, and Spinner V
reserve function CNZSetup_Player_TubeRoll
reserve function CNZSetup_Player_TubeAirRoll

reserve function CNZSetup_SpeedUpMusic1P
reserve function CNZSetup_SlowDownMusic1P
reserve function CNZSetup_SpeedUpMusic2P
reserve function CNZSetup_SlowDownMusic2P


// ========================
// Tables
// ========================

private table CNZSetup_palCycleTable
	0xE08000, 0xE0A000, 0xC0E000
	0xE0E0E0, 0xA0E000, 0x40E000
	0x00C060, 0x40C0C0, 0x0080E0
	0x0040E0, 0x4000E0, 0x8000C0
	0xE020C0, 0xE00080, 0xE00040
	0xE00000, 0xE04000, 0xE06000
end table

private table CNZSetup_sonicPlateAniTileTable
	390, 391, 394, 395
	398, 399, 402, 403
	406, 407, 410, 411
	414, 415, 418, 419
	422, 423, 426, 427
	430, 431, 434, 435
	438, 439, 442, 443
	446, 447, 450, 451
end table

private table CNZSetup_tailsPlateAniTileTable
	388, 389, 392, 393
	396, 397, 400, 401
	404, 405, 408, 409
	412, 413, 416, 417
	420, 421, 424, 425
	428, 429, 432, 433
	436, 437, 440, 441
	444, 445, 448, 449
end table

private table CNZSetup_aniTileIndexTable
	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
	0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
	1, 2, 3, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4
	4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4
	4, 4, 4, 5, 6, 7, 0, 1, 2, 3, 4, 5, 6, 7
	255
end table

private table CNZSetup_deformationTable
	1, 2, 1, 3, 1, 2, 2, 1, 2, 3, 1, 2, 1, 2, 0, 0
	2, 0, 3, 2, 2, 3, 2, 2, 1, 3, 0, 0, 1, 0, 1, 3
	1, 2, 1, 3, 1, 2, 2, 1, 2, 3, 1, 2, 1, 2, 0, 0
	2, 0, 3, 2, 2, 3, 2, 2, 1, 3, 0, 0, 1, 0, 1, 3
end table

private table CNZSetup_replay_attract_S
	0x480000, 0x2AC0000
	0x00, 73
	0x08, 107
	0x00, 1
	0x30, 1
	0x20, 3
	0x00, 3
	0x04, 20
	0x00, 37
	0x04, 23
	0x00, 108
	0x04, 23
	0x00, 24
	0x08, 60
	0x38, 1
	0x28, 31
	0x08, 4
	0x00, 9
	0x04, 8
	0x00, 41
	0x08, 99
	0x00, 2
	0x04, 39
	0x00, 18
	0x08, 2
	0x00, 9
	0x08, 37
	0x38, 1
	0x28, 17
	0x20, 6
	0x24, 25
	0x20, 5
	0x28, 42
	0x20, 8
	0x24, 6
	0x20, 3
	0x28, 89
	0x20, 1
	0x24, 3
	0x04, 37
	0x00, 5
	0x08, 45
	0x38, 1
	0x28, 3
	0x20, 13
	0x28, 8
	0x20, 1
	0x24, 2
	0x04, 71
	0x00, 115
	0x08, 38
	0x00, 14
	0x08, 12
	0x00, 1
	0x04, 22
	0x00, 30
	0x30, 1
	0x20, 2
	0x28, 45
	0x20, 9
	0x28, 8
	0x08, 51
	0x00, 1
	0x04, 106
	0x00, 14
	0x04, 9
	0x00, 2
	0x04, 14
	0x00, 15
	0x04, 18
	0x00, 27
end table

private table CNZSetup_replay_attract_T
	0x480000, 0x2B00000
	0x00, 52
	0x08, 105
	0x38, 1
	0x20, 3
	0x00, 8
	0x04, 20
	0x00, 12
	0x08, 10
	0x38, 1
	0x28, 41
	0x08, 7
	0x00, 6
	0x04, 11
	0x00, 3
	0x30, 1
	0x20, 4
	0x28, 31
	0x08, 73
	0x38, 1
	0x28, 65
	0x08, 29
	0x00, 20
	0x04, 7
	0x00, 2
	0x08, 36
	0x38, 1
	0x28, 6
	0x08, 11
	0x00, 2
	0x30, 1
	0x20, 4
	0x28, 5
	0x08, 5
	0x38, 1
	0x28, 8
	0x08, 6
	0x00, 46
	0x08, 114
	0x00, 3
	0x04, 51
	0x00, 28
	0x08, 27
	0x00, 9
	0x04, 9
	0x00, 179
	0x08, 38
	0x00, 12
	0x08, 17
	0x00, 1
	0x04, 4
	0x00, 15
	0x04, 9
	0x00, 1
	0x08, 15
	0x00, 1
	0x04, 15
	0x00, 8
	0x04, 18
	0x34, 1
	0x24, 5
	0x04, 7
	0x34, 1
	0x24, 4
	0x04, 5
	0x30, 1
	0x20, 4
	0x00, 3
	0x30, 1
	0x20, 4
	0x28, 3
	0x38, 1
	0x28, 4
	0x38, 1
	0x20, 4
	0x28, 2
	0x08, 1
	0x38, 1
	0x28, 3
	0x38, 1
	0x28, 4
	0x08, 1
	0x30, 1
	0x20, 3
	0x30, 1
	0x20, 4
	0x30, 1
	0x20, 4
	0x30, 1
	0x20, 3
	0x00, 1
	0x30, 1
	0x20, 3
	0x30, 1
	0x20, 4
	0x00, 1
	0x30, 1
	0x20, 3
	0x30, 1
	0x20, 4
	0x30, 1
	0x20, 4
	0x30, 1
	0x20, 3
	0x00, 1
	0x30, 1
	0x20, 3
	0x30, 1
	0x20, 6
	0x30, 1
	0x20, 1
	0x30, 1
	0x20, 6
	0x30, 1
	0x20, 3
	0x30, 1
	0x20, 2
	0x28, 4
	0x38, 1
	0x28, 2
	0x38, 1
	0x28, 1
	0x20, 6
	0x00, 1
	0x30, 1
	0x20, 2
	0x30, 1
	0x20, 6
	0x30, 1
	0x20, 3
	0x30, 1
	0x20, 5
	0x00, 1
	0x30, 1
	0x20, 2
	0x30, 1
	0x20, 5
	0x00, 1
	0x30, 1
	0x20, 2
	0x30, 1
	0x20, 5
	0x00, 1
	0x30, 1
	0x20, 3
	0x30, 1
	0x20, 5
	0x00, 1
	0x30, 1
	0x20, 3
	0x30, 1
	0x20, 5
	0x30, 1
	0x20, 1
	0x28, 3
	0x38, 1
	0x28, 4
	0x38, 1
	0x28, 1
	0x20, 3
	0x30, 1
	0x20, 5
	0x30, 1
	0x20, 5
	0x30, 1
	0x20, 5
	0x00, 1
	0x30, 1
	0x20, 2
	0x30, 1
	0x20, 4
	0x00, 2
	0x30, 1
	0x20, 2
	0x30, 1
	0x20, 4
	0x30, 1
	0x20, 4
	0x30, 1
	0x20, 5
	0x24, 1
	0x04, 1
	0x34, 1
	0x24, 1
	0x34, 1
	0x24, 7
	0x04, 1
	0x34, 1
	0x24, 2
	0x20, 1
	0x30, 1
	0x20, 7
	0x00, 1
	0x34, 1
	0x24, 3
	0x04, 23
	0x34, 1
	0x20, 1
	0x28, 2
	0x38, 1
	0x28, 7
	0x08, 1
	0x38, 1
	0x28, 2
	0x38, 1
	0x28, 1
	0x20, 4
	0x30, 1
	0x20, 5
	0x30, 1
	0x20, 3
	0x00, 2
	0x30, 1
	0x20, 2
	0x30, 1
	0x20, 6
	0x00, 2
	0x30, 2
	0x20, 7
	0x00, 1
	0x30, 1
	0x20, 1
	0x30, 1
	0x20, 6
	0x30, 1
	0x20, 3
	0x30, 1
	0x20, 3
	0x30, 1
	0x20, 5
	0x30, 1
	0x20, 5
	0x00, 1
	0x30, 1
	0x20, 2
	0x30, 1
	0x20, 6
	0x00, 2
	0x30, 2
	0x20, 4
	0x28, 3
	0x08, 3
	0x30, 1
	0x20, 1
	0x30, 1
	0x24, 6
	0x04, 2
	0x34, 1
	0x24, 1
	0x34, 1
	0x24, 7
	0x04, 1
	0x34, 1
	0x24, 3
	0x34, 1
	0x24, 3
	0x04, 10
	0x00, 9
	0x08, 10
	0x00, 33
	0x08, 5
end table

private table CNZSetup_replay_attract_K
	0x480000, 0x2AC0000
	0x00, 58
	0x08, 133
	0x38, 1
	0x28, 12
	0x08, 13
	0x38, 1
	0x28, 250
	0x08, 32
	0x38, 1
	0x28, 5
	0x08, 6
	0x00, 9
	0x04, 5
	0x00, 15
	0x04, 4
	0x00, 8
	0x04, 8
	0x00, 5
	0x04, 13
	0x00, 25
	0x08, 11
	0x00, 3
	0x04, 23
	0x00, 4
	0x08, 29
	0x30, 1
	0x24, 8
	0x04, 1
	0x00, 32
	0x04, 27
	0x34, 1
	0x24, 2
	0x20, 1
	0x00, 19
	0x08, 14
	0x00, 10
	0x04, 8
	0x34, 1
	0x24, 18
	0x20, 2
	0x28, 46
	0x20, 1
	0x24, 20
	0x20, 1
	0x28, 14
	0x2A, 43
	0x0A, 14
	0x3A, 1
	0x2A, 5
	0x0A, 2
	0x08, 8
	0x00, 11
	0x04, 18
	0x34, 1
	0x24, 72
	0x25, 17
	0x05, 2
	0x04, 34
	0x00, 12
	0x04, 3
	0x00, 6
	0x04, 102
	0x34, 1
	0x24, 3
	0x04, 184
	0x34, 1
	0x24, 24
	0x04, 7
	0x34, 1
	0x24, 10
	0x25, 14
	0x24, 23
	0x25, 11
	0x21, 2
	0x29, 2
	0x09, 10
	0x39, 1
	0x29, 11
	0x09, 16
	0x39, 1
	0x29, 39
	0x28, 2
	0x08, 12
	0x38, 1
	0x28, 5
	0x20, 10
	0x28, 47
	0x20, 1
end table


// ========================
// Function Definitions
// ========================

public function CNZSetup_Player_TubeRoll
	if player.gravity == GRAVITY_AIR
		object.state = CNZSetup_Player_TubeAirRoll
		player.timer = 0
		CallFunction(Player_HandleAirMovement)
	else
		temp1 = false
		GetBit(temp0, player.direction, 0)
		if temp0 == FACING_RIGHT
			if player.left == true
				if player.speed > 0
					player.speed -= player.rollingDeceleration
				else
					player.direction ^= FACING_LEFT
					player.speed = -0x8000
				end if
			else
				if player.angle == 0
					if player.speed <= 0
						player.speed = 0x40000
					end if
				end if
			end if
		else
			if player.right == true
				if player.speed < 0
					player.speed += player.rollingDeceleration
				else
					player.direction ^= FACING_LEFT
					player.speed = 0x8000
				end if
			else
				if player.angle == 0
					if player.speed >= 0
						player.speed = -0x40000
					end if
				end if
			end if
		end if

		if player.speed > 0
			player.speed -= player.rollingFriction
			Sin256(temp0, player.angle)
			if temp0 > 0
				Sin256(temp0, player.angle)
				temp0 *= 0x5000
			else
				Sin256(temp0, player.angle)
				temp0 *= 0x1E00
			end if
			temp0 >>= 8
			player.speed += temp0
		else
			player.speed += player.rollingFriction
			Sin256(temp0, player.angle)
			if temp0 < 0
				Sin256(temp0, player.angle)
				temp0 *= 0x5000
			else
				Sin256(temp0, player.angle)
				temp0 *= 0x1E00
			end if
			temp0 >>= 8
			player.speed += temp0
		end if

		CallFunction(Player_HandleRollAnimSpeed)
		player.animationSpeed = player.rollAnimationSpeed
		CallFunction(Player_HandleOnGround)
	end if
end function


public function CNZSetup_Player_TubeAirRoll
	CallFunction(Player_HandleAirFriction)
	if player.gravity == GRAVITY_AIR
		CallFunction(Player_HandleAirMovement)
	else
		player.state = CNZSetup_Player_TubeRoll
		CallFunction(Player_HandleOnGround)
		player.skidding = 0
	end if
	player.animation = ANI_JUMPING
end function


private function CNZSetup_SpeedUpMusic1P
	CheckEqual(object[SLOT_MUSICEVENT_CHANGE].type, TypeName[Music Event])
	temp0 = checkResult
	CheckEqual(object[SLOT_MUSICEVENT_CHANGE].propertyValue, MUSICEVENT_TRANSITION)
	temp0 &= checkResult
	CheckEqual(stage.musicFlag, MUSICEVENT_FLAG_NOCHANGE)
	temp0 &= checkResult
	if temp0 == false
		switch music.currentTrack
		case TRACK_STAGE
			SetMusicTrack("Invincibility_F.ogg", TRACK_INVINCIBLE, MUSIC_LOOP_INV_F)
			SwapMusicTrack("EmeraldHill2_F.ogg", TRACK_STAGE, MUSIC_LOOP_CNZ_1P_F, 8000)
			break

		case TRACK_INVINCIBLE
			SetMusicTrack("EmeraldHill2_F.ogg", TRACK_STAGE, MUSIC_LOOP_CNZ_1P_F)
			SwapMusicTrack("Invincibility_F.ogg", TRACK_INVINCIBLE, MUSIC_LOOP_INV_F, 8000)
			break

		case TRACK_BOSS
		case TRACK_DROWNING
		case TRACK_SUPER
			SetMusicTrack("EmeraldHill2_F.ogg", TRACK_STAGE, MUSIC_LOOP_CNZ_1P_F)
			SetMusicTrack("Invincibility_F.ogg", TRACK_INVINCIBLE, MUSIC_LOOP_INV_F)
			break
			
		end switch
	else
		stage.musicFlag = MUSICEVENT_FLAG_SPEEDUP
	end if
end function


private function CNZSetup_SlowDownMusic1P
	CheckEqual(object[SLOT_MUSICEVENT_CHANGE].type, TypeName[Music Event])
	temp0 = checkResult
	CheckEqual(object[SLOT_MUSICEVENT_CHANGE].propertyValue, MUSICEVENT_TRANSITION)
	temp0 &= checkResult
	CheckEqual(stage.musicFlag, MUSICEVENT_FLAG_NOCHANGE)
	temp0 &= checkResult
	if temp0 == false
		switch music.currentTrack
		case TRACK_STAGE
			SetMusicTrack("Invincibility.ogg", TRACK_INVINCIBLE, MUSIC_LOOP_INV)
			SwapMusicTrack("EmeraldHill2.ogg", TRACK_STAGE, MUSIC_LOOP_CNZ_1P, 12500)
			break

		case TRACK_INVINCIBLE
			SetMusicTrack("EmeraldHill2.ogg", TRACK_STAGE, MUSIC_LOOP_CNZ_1P)
			SwapMusicTrack("Invincibility.ogg", TRACK_INVINCIBLE, MUSIC_LOOP_INV, 12500)
			break

		case TRACK_BOSS
		case TRACK_DROWNING
		case TRACK_SUPER
			SetMusicTrack("EmeraldHill2.ogg", TRACK_STAGE, MUSIC_LOOP_CNZ_1P)
			SetMusicTrack("Invincibility.ogg", TRACK_INVINCIBLE, MUSIC_LOOP_INV)
			break
			
		end switch
	else
		stage.musicFlag = MUSICEVENT_FLAG_SLOWDOWN
	end if
end function


private function CNZSetup_SpeedUpMusic2P
	CheckEqual(object[SLOT_MUSICEVENT_CHANGE].type, TypeName[Music Event])
	temp0 = checkResult
	CheckEqual(object[SLOT_MUSICEVENT_CHANGE].propertyValue, MUSICEVENT_TRANSITION)
	temp0 &= checkResult
	CheckEqual(stage.musicFlag, MUSICEVENT_FLAG_NOCHANGE)
	temp0 &= checkResult
	if temp0 == false
		switch music.currentTrack
		case TRACK_STAGE
			SetMusicTrack("Invincibility_F.ogg", TRACK_INVINCIBLE, MUSIC_LOOP_INV_F)
			SwapMusicTrack("EmeraldHill22_F.ogg", TRACK_STAGE, MUSIC_LOOP_CNZ_2P_F, 8000)
			break

		case TRACK_INVINCIBLE
			SetMusicTrack("EmeraldHill22_F.ogg", TRACK_STAGE, MUSIC_LOOP_CNZ_2P_F)
			SwapMusicTrack("Invincibility_F.ogg", TRACK_INVINCIBLE, MUSIC_LOOP_INV_F, 8000)
			break

		case TRACK_BOSS
		case TRACK_DROWNING
		case TRACK_SUPER
			SetMusicTrack("EmeraldHill22_F.ogg", TRACK_STAGE, MUSIC_LOOP_CNZ_2P_F)
			SetMusicTrack("Invincibility_F.ogg", TRACK_INVINCIBLE, MUSIC_LOOP_INV_F)
			break
			
		end switch
	else
		stage.musicFlag = MUSICEVENT_FLAG_SPEEDUP
	end if
end function


private function CNZSetup_SlowDownMusic2P
	CheckEqual(object[SLOT_MUSICEVENT_CHANGE].type, TypeName[Music Event])
	temp0 = checkResult
	CheckEqual(object[SLOT_MUSICEVENT_CHANGE].propertyValue, MUSICEVENT_TRANSITION)
	temp0 &= checkResult
	CheckEqual(stage.musicFlag, MUSICEVENT_FLAG_NOCHANGE)
	temp0 &= checkResult
	if temp0 == false
		switch music.currentTrack
		case TRACK_STAGE
			SetMusicTrack("Invincibility.ogg", TRACK_INVINCIBLE, MUSIC_LOOP_INV)
			SwapMusicTrack("EmeraldHill22.ogg", TRACK_STAGE, MUSIC_LOOP_CNZ_2P, 12500)
			break

		case TRACK_INVINCIBLE
			SetMusicTrack("EmeraldHill22.ogg", TRACK_STAGE, MUSIC_LOOP_CNZ_2P)
			SwapMusicTrack("Invincibility.ogg", TRACK_INVINCIBLE, MUSIC_LOOP_INV, 12500)
			break

		case TRACK_BOSS
		case TRACK_DROWNING
		case TRACK_SUPER
			SetMusicTrack("EmeraldHill22.ogg", TRACK_STAGE, MUSIC_LOOP_CNZ_2P)
			SetMusicTrack("Invincibility.ogg", TRACK_INVINCIBLE, MUSIC_LOOP_INV)
			break
			
		end switch
	else
		stage.musicFlag = MUSICEVENT_FLAG_SLOWDOWN
	end if
end function


// ========================
// Events
// ========================

event ObjectUpdate
	object.deformTimer++
	if object.deformTimer > 7
		tileLayer[1].deformationOffset++
		object.deformTimer = 0
	end if

	object.paletteTimer++
	if object.paletteTimer == 6
		object.paletteTimer = 0
		RotatePalette(0, 149, 151, false)
	end if

	if object.animationTimer < 2
		GetTableValue(temp0, object.sonicPlateFrameID, CNZSetup_aniTileIndexTable)
		if temp0 == 0xFF
			object.sonicPlateFrameID = 0
			GetTableValue(temp0, object.sonicPlateFrameID, CNZSetup_aniTileIndexTable)
		end if
		end event


event ObjectStartup
	if options.vsMode == false
		SetMusicTrack("EmeraldHill2.ogg", TRACK_STAGE, MUSIC_LOOP_CNZ_1P)
		SpeedUpMusic = CNZSetup_SpeedUpMusic1P
		SlowDownMusic = CNZSetup_SlowDownMusic1P
	else
		SetMusicTrack("EmeraldHill22.ogg", TRACK_STAGE, MUSIC_LOOP_CNZ_2P)
		SpeedUpMusic = CNZSetup_SpeedUpMusic2P
		SlowDownMusic = CNZSetup_SlowDownMusic2P
	end if

	SetPaletteEntry(0, 192, 0x000000)

	animalType1 = TypeName[Flicky]
	animalType2 = TypeName[Becky]

	arrayPos0 = 0
	while arrayPos0 < 576
		temp0 = arrayPos0
		temp0 &= 0x3F
		GetTableValue(stage.deformationData2[arrayPos0], temp0, CNZSetup_deformationTable)
		arrayPos0++
	loop

	// 10 = SLOT_ZONESETUP
	object[10].type 				= TypeName[CNZ Setup]
	object[10].priority 			= PRIORITY_ACTIVE
	object[10].paletteIndex2 		= 1
	object[10].paletteIndex3 		= 2
	object[10].tailsPlateFrameID 	= 70

	if options.attractMode == true
		switch stage.playerListPos
		case PLAYER_SONIC_A
#platform: USE_ORIGINS
		case PLAYER_AMY_A // Amy isn't even able to show up in demos, but check for her anyway I guess
#endplatform
			Player_attractTable 	= CNZSetup_replay_attract_S
			Player_attractTableSize = 142
			Player_attractDuration 	= 1800
			break
			
		case PLAYER_TAILS_A
			Player_attractTable 	= CNZSetup_replay_attract_T
			Player_attractTableSize = 522
			Player_attractDuration 	= 1800
			break
			
		case PLAYER_KNUCKLES_A
			Player_attractTable 	= CNZSetup_replay_attract_K
			Player_attractTableSize = 178
			Player_attractDuration 	= 1800
			break
		end switch
		
		CallFunction(Player_SetupAttractDemo)
	end if
end event


// ========================
// Editor Events
// ========================

event RSDKDraw
	DrawSprite(0)
end event


event RSDKLoad
	LoadSpriteSheet("Global/Display.gif")
	SpriteFrame(-16, -16, 32, 32, 1, 143)
	
	SetVariableAlias(ALIAS_VAR_PROPVAL, "unused")
end event
